home *** CD-ROM | disk | FTP | other *** search
/ PC World Interactive 11 / PC World Interactive 11.iso / share / multimed / MAINACT / DATA1.CAB / Script_Files / play.rex < prev    next >
OS/2 REXX Batch file  |  1998-05-04  |  1KB  |  23 lines
  1. /**************************************************************
  2.  *                                                            *
  3.  *                   MainActor Rexx Script                    *
  4.  *                                                            *
  5.  *  Plays the current project in window mode, restores        *
  6.  *  old settings when finished.                               *
  7.  *                                                            *
  8.  *  Last modified: 09/23/97, Written by: Markus Moenig        *
  9.  *                                                            *
  10.  **************************************************************/
  11.  
  12.   IF GetGlobalInfo("LOADEDPROJECTS")= "0" THEN DO     /* Check if there are */
  13.    BEGIN                                              /* any projects loaded */
  14.     say "No project loaded! Exiting ..."              /* No project, exit */
  15.     exit
  16.    END
  17.  
  18.   oldfs_sett=SetPlaybackConfig("FULLSCREEN", "OFF" )     /* Disable FullScreen mode */
  19.  
  20.   PlayProject()                                          /* Play it ... */
  21.                               
  22.   SetPlaybackConfig("FULLSCREEN", oldfs_sett)            /* Restore old settings ... */
  23.